\(\int \frac {(c+d x)^2}{(a+a \tanh (e+f x))^3} \, dx\) [44]

Optimal result

Integrand size = 20, antiderivative size = 246 \[ \int \frac {(c+d x)^2}{(a+a \tanh (e+f x))^3} \, dx=-\frac {d^2 e^{-6 e-6 f x}}{864 a^3 f^3}-\frac {3 d^2 e^{-4 e-4 f x}}{256 a^3 f^3}-\frac {3 d^2 e^{-2 e-2 f x}}{32 a^3 f^3}-\frac {d e^{-6 e-6 f x} (c+d x)}{144 a^3 f^2}-\frac {3 d e^{-4 e-4 f x} (c+d x)}{64 a^3 f^2}-\frac {3 d e^{-2 e-2 f x} (c+d x)}{16 a^3 f^2}-\frac {e^{-6 e-6 f x} (c+d x)^2}{48 a^3 f}-\frac {3 e^{-4 e-4 f x} (c+d x)^2}{32 a^3 f}-\frac {3 e^{-2 e-2 f x} (c+d x)^2}{16 a^3 f}+\frac {(c+d x)^3}{24 a^3 d} \]

[Out]

-1/864*d^2*exp(-6*f*x-6*e)/a^3/f^3-3/256*d^2*exp(-4*f*x-4*e)/a^3/f^3-3/32*d^2*exp(-2*f*x-2*e)/a^3/f^3-1/144*d*
exp(-6*f*x-6*e)*(d*x+c)/a^3/f^2-3/64*d*exp(-4*f*x-4*e)*(d*x+c)/a^3/f^2-3/16*d*exp(-2*f*x-2*e)*(d*x+c)/a^3/f^2-
1/48*exp(-6*f*x-6*e)*(d*x+c)^2/a^3/f-3/32*exp(-4*f*x-4*e)*(d*x+c)^2/a^3/f-3/16*exp(-2*f*x-2*e)*(d*x+c)^2/a^3/f
+1/24*(d*x+c)^3/a^3/d

Rubi [A] (verified)

Time = 0.17 (sec) , antiderivative size = 246, normalized size of antiderivative = 1.00, number of steps used = 11, number of rules used = 3, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.150, Rules used = {3810, 2207, 2225} \[ \int \frac {(c+d x)^2}{(a+a \tanh (e+f x))^3} \, dx=-\frac {d (c+d x) e^{-6 e-6 f x}}{144 a^3 f^2}-\frac {3 d (c+d x) e^{-4 e-4 f x}}{64 a^3 f^2}-\frac {3 d (c+d x) e^{-2 e-2 f x}}{16 a^3 f^2}-\frac {(c+d x)^2 e^{-6 e-6 f x}}{48 a^3 f}-\frac {3 (c+d x)^2 e^{-4 e-4 f x}}{32 a^3 f}-\frac {3 (c+d x)^2 e^{-2 e-2 f x}}{16 a^3 f}+\frac {(c+d x)^3}{24 a^3 d}-\frac {d^2 e^{-6 e-6 f x}}{864 a^3 f^3}-\frac {3 d^2 e^{-4 e-4 f x}}{256 a^3 f^3}-\frac {3 d^2 e^{-2 e-2 f x}}{32 a^3 f^3} \]

[In]

Int[(c + d*x)^2/(a + a*Tanh[e + f*x])^3,x]

[Out]

-1/864*(d^2*E^(-6*e - 6*f*x))/(a^3*f^3) - (3*d^2*E^(-4*e - 4*f*x))/(256*a^3*f^3) - (3*d^2*E^(-2*e - 2*f*x))/(3
2*a^3*f^3) - (d*E^(-6*e - 6*f*x)*(c + d*x))/(144*a^3*f^2) - (3*d*E^(-4*e - 4*f*x)*(c + d*x))/(64*a^3*f^2) - (3
*d*E^(-2*e - 2*f*x)*(c + d*x))/(16*a^3*f^2) - (E^(-6*e - 6*f*x)*(c + d*x)^2)/(48*a^3*f) - (3*E^(-4*e - 4*f*x)*
(c + d*x)^2)/(32*a^3*f) - (3*E^(-2*e - 2*f*x)*(c + d*x)^2)/(16*a^3*f) + (c + d*x)^3/(24*a^3*d)

Rule 2207

Int[((b_.)*(F_)^((g_.)*((e_.) + (f_.)*(x_))))^(n_.)*((c_.) + (d_.)*(x_))^(m_.), x_Symbol] :> Simp[(c + d*x)^m*
((b*F^(g*(e + f*x)))^n/(f*g*n*Log[F])), x] - Dist[d*(m/(f*g*n*Log[F])), Int[(c + d*x)^(m - 1)*(b*F^(g*(e + f*x
)))^n, x], x] /; FreeQ[{F, b, c, d, e, f, g, n}, x] && GtQ[m, 0] && IntegerQ[2*m] &&  !TrueQ[$UseGamma]

Rule 2225

Int[((F_)^((c_.)*((a_.) + (b_.)*(x_))))^(n_.), x_Symbol] :> Simp[(F^(c*(a + b*x)))^n/(b*c*n*Log[F]), x] /; Fre
eQ[{F, a, b, c, n}, x]

Rule 3810

Int[((c_.) + (d_.)*(x_))^(m_)*((a_) + (b_.)*tan[(e_.) + (f_.)*(x_)])^(n_), x_Symbol] :> Int[ExpandIntegrand[(c
+ d*x)^m, (1/(2*a) + E^(2*(a/b)*(e + f*x))/(2*a))^(-n), x], x] /; FreeQ[{a, b, c, d, e, f, m}, x] && EqQ[a^2
+ b^2, 0] && ILtQ[n, 0]

Rubi steps \begin{align*} \text {integral}& = \int \left (\frac {(c+d x)^2}{8 a^3}+\frac {e^{-6 e-6 f x} (c+d x)^2}{8 a^3}+\frac {3 e^{-4 e-4 f x} (c+d x)^2}{8 a^3}+\frac {3 e^{-2 e-2 f x} (c+d x)^2}{8 a^3}\right ) \, dx \\ & = \frac {(c+d x)^3}{24 a^3 d}+\frac {\int e^{-6 e-6 f x} (c+d x)^2 \, dx}{8 a^3}+\frac {3 \int e^{-4 e-4 f x} (c+d x)^2 \, dx}{8 a^3}+\frac {3 \int e^{-2 e-2 f x} (c+d x)^2 \, dx}{8 a^3} \\ & = -\frac {e^{-6 e-6 f x} (c+d x)^2}{48 a^3 f}-\frac {3 e^{-4 e-4 f x} (c+d x)^2}{32 a^3 f}-\frac {3 e^{-2 e-2 f x} (c+d x)^2}{16 a^3 f}+\frac {(c+d x)^3}{24 a^3 d}+\frac {d \int e^{-6 e-6 f x} (c+d x) \, dx}{24 a^3 f}+\frac {(3 d) \int e^{-4 e-4 f x} (c+d x) \, dx}{16 a^3 f}+\frac {(3 d) \int e^{-2 e-2 f x} (c+d x) \, dx}{8 a^3 f} \\ & = -\frac {d e^{-6 e-6 f x} (c+d x)}{144 a^3 f^2}-\frac {3 d e^{-4 e-4 f x} (c+d x)}{64 a^3 f^2}-\frac {3 d e^{-2 e-2 f x} (c+d x)}{16 a^3 f^2}-\frac {e^{-6 e-6 f x} (c+d x)^2}{48 a^3 f}-\frac {3 e^{-4 e-4 f x} (c+d x)^2}{32 a^3 f}-\frac {3 e^{-2 e-2 f x} (c+d x)^2}{16 a^3 f}+\frac {(c+d x)^3}{24 a^3 d}+\frac {d^2 \int e^{-6 e-6 f x} \, dx}{144 a^3 f^2}+\frac {\left (3 d^2\right ) \int e^{-4 e-4 f x} \, dx}{64 a^3 f^2}+\frac {\left (3 d^2\right ) \int e^{-2 e-2 f x} \, dx}{16 a^3 f^2} \\ & = -\frac {d^2 e^{-6 e-6 f x}}{864 a^3 f^3}-\frac {3 d^2 e^{-4 e-4 f x}}{256 a^3 f^3}-\frac {3 d^2 e^{-2 e-2 f x}}{32 a^3 f^3}-\frac {d e^{-6 e-6 f x} (c+d x)}{144 a^3 f^2}-\frac {3 d e^{-4 e-4 f x} (c+d x)}{64 a^3 f^2}-\frac {3 d e^{-2 e-2 f x} (c+d x)}{16 a^3 f^2}-\frac {e^{-6 e-6 f x} (c+d x)^2}{48 a^3 f}-\frac {3 e^{-4 e-4 f x} (c+d x)^2}{32 a^3 f}-\frac {3 e^{-2 e-2 f x} (c+d x)^2}{16 a^3 f}+\frac {(c+d x)^3}{24 a^3 d} \\ \end{align*}

Mathematica [A] (verified)

Time = 2.12 (sec) , antiderivative size = 371, normalized size of antiderivative = 1.51 \[ \int \frac {(c+d x)^2}{(a+a \tanh (e+f x))^3} \, dx=\frac {\text {sech}^3(e+f x) \left (-81 \left (24 c^2 f^2+4 c d f (5+12 f x)+d^2 \left (9+20 f x+24 f^2 x^2\right )\right ) \cosh (e+f x)+8 \left (18 c^2 f^2 (-1+6 f x)+6 c d f \left (-1-6 f x+18 f^2 x^2\right )+d^2 \left (-1-6 f x-18 f^2 x^2+36 f^3 x^3\right )\right ) \cosh (3 (e+f x))-567 d^2 \sinh (e+f x)-972 c d f \sinh (e+f x)-648 c^2 f^2 \sinh (e+f x)-972 d^2 f x \sinh (e+f x)-1296 c d f^2 x \sinh (e+f x)-648 d^2 f^2 x^2 \sinh (e+f x)+8 d^2 \sinh (3 (e+f x))+48 c d f \sinh (3 (e+f x))+144 c^2 f^2 \sinh (3 (e+f x))+48 d^2 f x \sinh (3 (e+f x))+288 c d f^2 x \sinh (3 (e+f x))+864 c^2 f^3 x \sinh (3 (e+f x))+144 d^2 f^2 x^2 \sinh (3 (e+f x))+864 c d f^3 x^2 \sinh (3 (e+f x))+288 d^2 f^3 x^3 \sinh (3 (e+f x))\right )}{6912 a^3 f^3 (1+\tanh (e+f x))^3} \]

[In]

Integrate[(c + d*x)^2/(a + a*Tanh[e + f*x])^3,x]

[Out]

(Sech[e + f*x]^3*(-81*(24*c^2*f^2 + 4*c*d*f*(5 + 12*f*x) + d^2*(9 + 20*f*x + 24*f^2*x^2))*Cosh[e + f*x] + 8*(1
8*c^2*f^2*(-1 + 6*f*x) + 6*c*d*f*(-1 - 6*f*x + 18*f^2*x^2) + d^2*(-1 - 6*f*x - 18*f^2*x^2 + 36*f^3*x^3))*Cosh[
3*(e + f*x)] - 567*d^2*Sinh[e + f*x] - 972*c*d*f*Sinh[e + f*x] - 648*c^2*f^2*Sinh[e + f*x] - 972*d^2*f*x*Sinh[
e + f*x] - 1296*c*d*f^2*x*Sinh[e + f*x] - 648*d^2*f^2*x^2*Sinh[e + f*x] + 8*d^2*Sinh[3*(e + f*x)] + 48*c*d*f*S
inh[3*(e + f*x)] + 144*c^2*f^2*Sinh[3*(e + f*x)] + 48*d^2*f*x*Sinh[3*(e + f*x)] + 288*c*d*f^2*x*Sinh[3*(e + f*
x)] + 864*c^2*f^3*x*Sinh[3*(e + f*x)] + 144*d^2*f^2*x^2*Sinh[3*(e + f*x)] + 864*c*d*f^3*x^2*Sinh[3*(e + f*x)]
+ 288*d^2*f^3*x^3*Sinh[3*(e + f*x)]))/(6912*a^3*f^3*(1 + Tanh[e + f*x])^3)

Maple [A] (verified)

Time = 0.30 (sec) , antiderivative size = 223, normalized size of antiderivative = 0.91

method	result	size
risch	\(\frac {d^{2} x^{3}}{24 a^{3}}+\frac {d c \,x^{2}}{8 a^{3}}+\frac {c^{2} x}{8 a^{3}}+\frac {c^{3}}{24 a^{3} d}-\frac {3 \left (2 d^{2} x^{2} f^{2}+4 c d \,f^{2} x +2 c^{2} f^{2}+2 d^{2} f x +2 c d f +d^{2}\right ) {\mathrm e}^{-2 f x -2 e}}{32 a^{3} f^{3}}-\frac {3 \left (8 d^{2} x^{2} f^{2}+16 c d \,f^{2} x +8 c^{2} f^{2}+4 d^{2} f x +4 c d f +d^{2}\right ) {\mathrm e}^{-4 f x -4 e}}{256 a^{3} f^{3}}-\frac {\left (18 d^{2} x^{2} f^{2}+36 c d \,f^{2} x +18 c^{2} f^{2}+6 d^{2} f x +6 c d f +d^{2}\right ) {\mathrm e}^{-6 f x -6 e}}{864 a^{3} f^{3}}\)	\(223\)
parallelrisch	\(\frac {-328 d^{2}-417 d^{2} f x +255 x \tanh \left (f x +e \right )^{3} d^{2} f +198 x^{2} \tanh \left (f x +e \right )^{3} d^{2} f^{2}-396 \tanh \left (f x +e \right )^{2} c d f +72 d^{2} \tanh \left (f x +e \right )^{3} x^{3} f^{3}-567 \tanh \left (f x +e \right ) d^{2}-720 c^{2} f^{2}+216 c d \,x^{2} f^{3}+216 x \tanh \left (f x +e \right )^{3} c^{2} f^{3}-1044 c d \,f^{2} x -522 d^{2} x^{2} f^{2}-672 c d f -648 \tanh \left (f x +e \right ) c^{2} f^{2}-255 \tanh \left (f x +e \right )^{2} d^{2}+216 x \,c^{2} f^{3}+72 d^{2} x^{3} f^{3}+216 d^{2} \tanh \left (f x +e \right ) x^{3} f^{3}+648 x \tanh \left (f x +e \right ) c^{2} f^{3}-207 x \tanh \left (f x +e \right ) d^{2} f -54 x^{2} \tanh \left (f x +e \right ) d^{2} f^{2}+756 x \tanh \left (f x +e \right )^{2} c d \,f^{2}+648 x^{2} \tanh \left (f x +e \right )^{2} c d \,f^{3}+396 x \tanh \left (f x +e \right )^{3} c d \,f^{2}+216 x^{2} \tanh \left (f x +e \right )^{3} c d \,f^{3}-108 x \tanh \left (f x +e \right ) c d \,f^{2}-216 \tanh \left (f x +e \right )^{2} c^{2} f^{2}+216 d^{2} \tanh \left (f x +e \right )^{2} x^{3} f^{3}-972 \tanh \left (f x +e \right ) c d f +648 x \tanh \left (f x +e \right )^{2} c^{2} f^{3}+369 x \tanh \left (f x +e \right )^{2} d^{2} f +378 x^{2} \tanh \left (f x +e \right )^{2} d^{2} f^{2}+648 x^{2} \tanh \left (f x +e \right ) c d \,f^{3}}{1728 f^{3} a^{3} \left (1+\tanh \left (f x +e \right )\right )^{3}}\)	\(472\)

[In]

int((d*x+c)^2/(a+a*tanh(f*x+e))^3,x,method=_RETURNVERBOSE)

[Out]

1/24/a^3*d^2*x^3+1/8/a^3*d*c*x^2+1/8/a^3*c^2*x+1/24/a^3/d*c^3-3/32*(2*d^2*f^2*x^2+4*c*d*f^2*x+2*c^2*f^2+2*d^2*
f*x+2*c*d*f+d^2)/a^3/f^3*exp(-2*f*x-2*e)-3/256*(8*d^2*f^2*x^2+16*c*d*f^2*x+8*c^2*f^2+4*d^2*f*x+4*c*d*f+d^2)/a^
3/f^3*exp(-4*f*x-4*e)-1/864*(18*d^2*f^2*x^2+36*c*d*f^2*x+18*c^2*f^2+6*d^2*f*x+6*c*d*f+d^2)/a^3/f^3*exp(-6*f*x-
6*e)

Fricas [B] (verification not implemented)

Leaf count of result is larger than twice the leaf count of optimal. 532 vs. \(2 (217) = 434\).

Time = 0.25 (sec) , antiderivative size = 532, normalized size of antiderivative = 2.16 \[ \int \frac {(c+d x)^2}{(a+a \tanh (e+f x))^3} \, dx=\frac {8 \, {\left (36 \, d^{2} f^{3} x^{3} - 18 \, c^{2} f^{2} - 6 \, c d f + 18 \, {\left (6 \, c d f^{3} - d^{2} f^{2}\right )} x^{2} - d^{2} + 6 \, {\left (18 \, c^{2} f^{3} - 6 \, c d f^{2} - d^{2} f\right )} x\right )} \cosh \left (f x + e\right )^{3} + 24 \, {\left (36 \, d^{2} f^{3} x^{3} - 18 \, c^{2} f^{2} - 6 \, c d f + 18 \, {\left (6 \, c d f^{3} - d^{2} f^{2}\right )} x^{2} - d^{2} + 6 \, {\left (18 \, c^{2} f^{3} - 6 \, c d f^{2} - d^{2} f\right )} x\right )} \cosh \left (f x + e\right ) \sinh \left (f x + e\right )^{2} + 8 \, {\left (36 \, d^{2} f^{3} x^{3} + 18 \, c^{2} f^{2} + 6 \, c d f + 18 \, {\left (6 \, c d f^{3} + d^{2} f^{2}\right )} x^{2} + d^{2} + 6 \, {\left (18 \, c^{2} f^{3} + 6 \, c d f^{2} + d^{2} f\right )} x\right )} \sinh \left (f x + e\right )^{3} - 81 \, {\left (24 \, d^{2} f^{2} x^{2} + 24 \, c^{2} f^{2} + 20 \, c d f + 9 \, d^{2} + 4 \, {\left (12 \, c d f^{2} + 5 \, d^{2} f\right )} x\right )} \cosh \left (f x + e\right ) - 3 \, {\left (216 \, d^{2} f^{2} x^{2} + 216 \, c^{2} f^{2} + 324 \, c d f - 8 \, {\left (36 \, d^{2} f^{3} x^{3} + 18 \, c^{2} f^{2} + 6 \, c d f + 18 \, {\left (6 \, c d f^{3} + d^{2} f^{2}\right )} x^{2} + d^{2} + 6 \, {\left (18 \, c^{2} f^{3} + 6 \, c d f^{2} + d^{2} f\right )} x\right )} \cosh \left (f x + e\right )^{2} + 189 \, d^{2} + 108 \, {\left (4 \, c d f^{2} + 3 \, d^{2} f\right )} x\right )} \sinh \left (f x + e\right )}{6912 \, {\left (a^{3} f^{3} \cosh \left (f x + e\right )^{3} + 3 \, a^{3} f^{3} \cosh \left (f x + e\right )^{2} \sinh \left (f x + e\right ) + 3 \, a^{3} f^{3} \cosh \left (f x + e\right ) \sinh \left (f x + e\right )^{2} + a^{3} f^{3} \sinh \left (f x + e\right )^{3}\right )}} \]

[In]

integrate((d*x+c)^2/(a+a*tanh(f*x+e))^3,x, algorithm="fricas")

[Out]

1/6912*(8*(36*d^2*f^3*x^3 - 18*c^2*f^2 - 6*c*d*f + 18*(6*c*d*f^3 - d^2*f^2)*x^2 - d^2 + 6*(18*c^2*f^3 - 6*c*d*
f^2 - d^2*f)*x)*cosh(f*x + e)^3 + 24*(36*d^2*f^3*x^3 - 18*c^2*f^2 - 6*c*d*f + 18*(6*c*d*f^3 - d^2*f^2)*x^2 - d
^2 + 6*(18*c^2*f^3 - 6*c*d*f^2 - d^2*f)*x)*cosh(f*x + e)*sinh(f*x + e)^2 + 8*(36*d^2*f^3*x^3 + 18*c^2*f^2 + 6*
c*d*f + 18*(6*c*d*f^3 + d^2*f^2)*x^2 + d^2 + 6*(18*c^2*f^3 + 6*c*d*f^2 + d^2*f)*x)*sinh(f*x + e)^3 - 81*(24*d^
2*f^2*x^2 + 24*c^2*f^2 + 20*c*d*f + 9*d^2 + 4*(12*c*d*f^2 + 5*d^2*f)*x)*cosh(f*x + e) - 3*(216*d^2*f^2*x^2 + 2
16*c^2*f^2 + 324*c*d*f - 8*(36*d^2*f^3*x^3 + 18*c^2*f^2 + 6*c*d*f + 18*(6*c*d*f^3 + d^2*f^2)*x^2 + d^2 + 6*(18
*c^2*f^3 + 6*c*d*f^2 + d^2*f)*x)*cosh(f*x + e)^2 + 189*d^2 + 108*(4*c*d*f^2 + 3*d^2*f)*x)*sinh(f*x + e))/(a^3*
f^3*cosh(f*x + e)^3 + 3*a^3*f^3*cosh(f*x + e)^2*sinh(f*x + e) + 3*a^3*f^3*cosh(f*x + e)*sinh(f*x + e)^2 + a^3*
f^3*sinh(f*x + e)^3)

Sympy [F]

\[ \int \frac {(c+d x)^2}{(a+a \tanh (e+f x))^3} \, dx=\frac {\int \frac {c^{2}}{\tanh ^{3}{\left (e + f x \right )} + 3 \tanh ^{2}{\left (e + f x \right )} + 3 \tanh {\left (e + f x \right )} + 1}\, dx + \int \frac {d^{2} x^{2}}{\tanh ^{3}{\left (e + f x \right )} + 3 \tanh ^{2}{\left (e + f x \right )} + 3 \tanh {\left (e + f x \right )} + 1}\, dx + \int \frac {2 c d x}{\tanh ^{3}{\left (e + f x \right )} + 3 \tanh ^{2}{\left (e + f x \right )} + 3 \tanh {\left (e + f x \right )} + 1}\, dx}{a^{3}} \]

[In]

integrate((d*x+c)**2/(a+a*tanh(f*x+e))**3,x)

[Out]

(Integral(c**2/(tanh(e + f*x)**3 + 3*tanh(e + f*x)**2 + 3*tanh(e + f*x) + 1), x) + Integral(d**2*x**2/(tanh(e
+ f*x)**3 + 3*tanh(e + f*x)**2 + 3*tanh(e + f*x) + 1), x) + Integral(2*c*d*x/(tanh(e + f*x)**3 + 3*tanh(e + f*
x)**2 + 3*tanh(e + f*x) + 1), x))/a**3

Maxima [A] (verification not implemented)

none

Time = 1.19 (sec) , antiderivative size = 255, normalized size of antiderivative = 1.04 \[ \int \frac {(c+d x)^2}{(a+a \tanh (e+f x))^3} \, dx=\frac {1}{96} \, c^{2} {\left (\frac {12 \, {\left (f x + e\right )}}{a^{3} f} - \frac {18 \, e^{\left (-2 \, f x - 2 \, e\right )} + 9 \, e^{\left (-4 \, f x - 4 \, e\right )} + 2 \, e^{\left (-6 \, f x - 6 \, e\right )}}{a^{3} f}\right )} + \frac {{\left (72 \, f^{2} x^{2} e^{\left (6 \, e\right )} - 108 \, {\left (2 \, f x e^{\left (4 \, e\right )} + e^{\left (4 \, e\right )}\right )} e^{\left (-2 \, f x\right )} - 27 \, {\left (4 \, f x e^{\left (2 \, e\right )} + e^{\left (2 \, e\right )}\right )} e^{\left (-4 \, f x\right )} - 4 \, {\left (6 \, f x + 1\right )} e^{\left (-6 \, f x\right )}\right )} c d e^{\left (-6 \, e\right )}}{576 \, a^{3} f^{2}} + \frac {{\left (288 \, f^{3} x^{3} e^{\left (6 \, e\right )} - 648 \, {\left (2 \, f^{2} x^{2} e^{\left (4 \, e\right )} + 2 \, f x e^{\left (4 \, e\right )} + e^{\left (4 \, e\right )}\right )} e^{\left (-2 \, f x\right )} - 81 \, {\left (8 \, f^{2} x^{2} e^{\left (2 \, e\right )} + 4 \, f x e^{\left (2 \, e\right )} + e^{\left (2 \, e\right )}\right )} e^{\left (-4 \, f x\right )} - 8 \, {\left (18 \, f^{2} x^{2} + 6 \, f x + 1\right )} e^{\left (-6 \, f x\right )}\right )} d^{2} e^{\left (-6 \, e\right )}}{6912 \, a^{3} f^{3}} \]

[In]

integrate((d*x+c)^2/(a+a*tanh(f*x+e))^3,x, algorithm="maxima")

[Out]

1/96*c^2*(12*(f*x + e)/(a^3*f) - (18*e^(-2*f*x - 2*e) + 9*e^(-4*f*x - 4*e) + 2*e^(-6*f*x - 6*e))/(a^3*f)) + 1/
576*(72*f^2*x^2*e^(6*e) - 108*(2*f*x*e^(4*e) + e^(4*e))*e^(-2*f*x) - 27*(4*f*x*e^(2*e) + e^(2*e))*e^(-4*f*x) -
4*(6*f*x + 1)*e^(-6*f*x))*c*d*e^(-6*e)/(a^3*f^2) + 1/6912*(288*f^3*x^3*e^(6*e) - 648*(2*f^2*x^2*e^(4*e) + 2*f
*x*e^(4*e) + e^(4*e))*e^(-2*f*x) - 81*(8*f^2*x^2*e^(2*e) + 4*f*x*e^(2*e) + e^(2*e))*e^(-4*f*x) - 8*(18*f^2*x^2
+ 6*f*x + 1)*e^(-6*f*x))*d^2*e^(-6*e)/(a^3*f^3)

Giac [A] (verification not implemented)

none

Time = 0.28 (sec) , antiderivative size = 315, normalized size of antiderivative = 1.28 \[ \int \frac {(c+d x)^2}{(a+a \tanh (e+f x))^3} \, dx=\frac {{\left (288 \, d^{2} f^{3} x^{3} e^{\left (6 \, f x + 6 \, e\right )} + 864 \, c d f^{3} x^{2} e^{\left (6 \, f x + 6 \, e\right )} + 864 \, c^{2} f^{3} x e^{\left (6 \, f x + 6 \, e\right )} - 1296 \, d^{2} f^{2} x^{2} e^{\left (4 \, f x + 4 \, e\right )} - 648 \, d^{2} f^{2} x^{2} e^{\left (2 \, f x + 2 \, e\right )} - 144 \, d^{2} f^{2} x^{2} - 2592 \, c d f^{2} x e^{\left (4 \, f x + 4 \, e\right )} - 1296 \, c d f^{2} x e^{\left (2 \, f x + 2 \, e\right )} - 288 \, c d f^{2} x - 1296 \, c^{2} f^{2} e^{\left (4 \, f x + 4 \, e\right )} - 1296 \, d^{2} f x e^{\left (4 \, f x + 4 \, e\right )} - 648 \, c^{2} f^{2} e^{\left (2 \, f x + 2 \, e\right )} - 324 \, d^{2} f x e^{\left (2 \, f x + 2 \, e\right )} - 144 \, c^{2} f^{2} - 48 \, d^{2} f x - 1296 \, c d f e^{\left (4 \, f x + 4 \, e\right )} - 324 \, c d f e^{\left (2 \, f x + 2 \, e\right )} - 48 \, c d f - 648 \, d^{2} e^{\left (4 \, f x + 4 \, e\right )} - 81 \, d^{2} e^{\left (2 \, f x + 2 \, e\right )} - 8 \, d^{2}\right )} e^{\left (-6 \, f x - 6 \, e\right )}}{6912 \, a^{3} f^{3}} \]

[In]

integrate((d*x+c)^2/(a+a*tanh(f*x+e))^3,x, algorithm="giac")

[Out]

1/6912*(288*d^2*f^3*x^3*e^(6*f*x + 6*e) + 864*c*d*f^3*x^2*e^(6*f*x + 6*e) + 864*c^2*f^3*x*e^(6*f*x + 6*e) - 12
96*d^2*f^2*x^2*e^(4*f*x + 4*e) - 648*d^2*f^2*x^2*e^(2*f*x + 2*e) - 144*d^2*f^2*x^2 - 2592*c*d*f^2*x*e^(4*f*x +
4*e) - 1296*c*d*f^2*x*e^(2*f*x + 2*e) - 288*c*d*f^2*x - 1296*c^2*f^2*e^(4*f*x + 4*e) - 1296*d^2*f*x*e^(4*f*x
+ 4*e) - 648*c^2*f^2*e^(2*f*x + 2*e) - 324*d^2*f*x*e^(2*f*x + 2*e) - 144*c^2*f^2 - 48*d^2*f*x - 1296*c*d*f*e^(
4*f*x + 4*e) - 324*c*d*f*e^(2*f*x + 2*e) - 48*c*d*f - 648*d^2*e^(4*f*x + 4*e) - 81*d^2*e^(2*f*x + 2*e) - 8*d^2
)*e^(-6*f*x - 6*e)/(a^3*f^3)

Mupad [B] (verification not implemented)

Time = 1.93 (sec) , antiderivative size = 236, normalized size of antiderivative = 0.96 \[ \int \frac {(c+d x)^2}{(a+a \tanh (e+f x))^3} \, dx=\frac {c^2\,x}{8\,a^3}-{\mathrm {e}}^{-2\,e-2\,f\,x}\,\left (\frac {6\,c^2\,f^2+6\,c\,d\,f+3\,d^2}{32\,a^3\,f^3}+\frac {3\,d^2\,x^2}{16\,a^3\,f}+\frac {3\,d\,x\,\left (d+2\,c\,f\right )}{16\,a^3\,f^2}\right )-{\mathrm {e}}^{-4\,e-4\,f\,x}\,\left (\frac {24\,c^2\,f^2+12\,c\,d\,f+3\,d^2}{256\,a^3\,f^3}+\frac {3\,d^2\,x^2}{32\,a^3\,f}+\frac {3\,d\,x\,\left (d+4\,c\,f\right )}{64\,a^3\,f^2}\right )-{\mathrm {e}}^{-6\,e-6\,f\,x}\,\left (\frac {18\,c^2\,f^2+6\,c\,d\,f+d^2}{864\,a^3\,f^3}+\frac {d^2\,x^2}{48\,a^3\,f}+\frac {d\,x\,\left (d+6\,c\,f\right )}{144\,a^3\,f^2}\right )+\frac {d^2\,x^3}{24\,a^3}+\frac {c\,d\,x^2}{8\,a^3} \]

[In]

int((c + d*x)^2/(a + a*tanh(e + f*x))^3,x)

[Out]

(c^2*x)/(8*a^3) - exp(- 2*e - 2*f*x)*((3*d^2 + 6*c^2*f^2 + 6*c*d*f)/(32*a^3*f^3) + (3*d^2*x^2)/(16*a^3*f) + (3
*d*x*(d + 2*c*f))/(16*a^3*f^2)) - exp(- 4*e - 4*f*x)*((3*d^2 + 24*c^2*f^2 + 12*c*d*f)/(256*a^3*f^3) + (3*d^2*x
^2)/(32*a^3*f) + (3*d*x*(d + 4*c*f))/(64*a^3*f^2)) - exp(- 6*e - 6*f*x)*((d^2 + 18*c^2*f^2 + 6*c*d*f)/(864*a^3
*f^3) + (d^2*x^2)/(48*a^3*f) + (d*x*(d + 6*c*f))/(144*a^3*f^2)) + (d^2*x^3)/(24*a^3) + (c*d*x^2)/(8*a^3)